VB -> Delphi

Otázka od: Michal Kuncl

2. 11. 2003 9:43

Zdravim,

dostal jsem za ukol "prelozit" jeden programek z visual basicu do delphi
  a nevim jak prelozit tohle:

Public Const ERROR_FILE_FORMAT_INVALID As Long = &H85200065

zvlaste mi vrta hlavou ta cast s tim &H85..... poradite mi nekdo prosim?

diky
Spider_X





----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: Libor Valka

2. 11. 2003 10:18

> Public Const ERROR_FILE_FORMAT_INVALID As Long = &H85200065
>
> zvlaste mi vrta hlavou ta cast s tim &H85..... poradite mi
> nekdo prosim?

Jedna se o zapis cisla v hexadecimalnim tvaru (85200065 hex = 2233466981
dec).

Libor






----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: Jan Fiala

2. 11. 2003 10:19

2.11.2003 Michal Kuncl:
> Zdravim,

> dostal jsem za ukol "prelozit" jeden programek z visual basicu do delphi
> a nevim jak prelozit tohle:

> Public Const ERROR_FILE_FORMAT_INVALID As Long = &H85200065

> zvlaste mi vrta hlavou ta cast s tim &H85..... poradite mi nekdo prosim?

const
ERROR_FILE_FORMAT_INVALID: Cardinal = $85200065;

--
Jan Fiala
mailto:jan.fiala@wo.cz





----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)

Odpovedá: Michal Kuncl

2. 11. 2003 12:04

Jan Fiala wrote:
>>zvlaste mi vrta hlavou ta cast s tim &H85..... poradite mi nekdo prosim?
>
>
> const
> ERROR_FILE_FORMAT_INVALID: Cardinal = $85200065;
>

Diky moc, to pomohlo. Jeste jsem se chtel zeptat, co by slo pouzit misto
typu "any" (jako napr. tady: Declare Function SFileRead(ByVal hSoubor As
Long, lBuffer As Any) As Boolean). Sel by pouzit treba variant?

spider_x





----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)